home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / umich / falcon / programm.ing / nt_dsp1.lzh / NT_DSP1.MSA / FNTNS / LOG2.ASM < prev    next >
Assembly Source File  |  1989-01-24  |  1KB  |  32 lines
  1. ;
  2. ; This program originally available on the Motorola DSP bulletin board.
  3. ; It is provided under a DISCLAMER OF WARRANTY available from
  4. ; Motorola DSP Operation, 6501 Wm. Cannon Drive W., Austin, Tx., 78735.
  5. ; 
  6. ; Logarithm Base 2 by Polynomial Approximation
  7. ; 
  8. ; Last Update 26 Jan 87   Version 1.0
  9. ;
  10. log2    macro
  11. log2    ident   1,0
  12. ;
  13. ;       Does a LOG2 by polynomial aproximation. 8 Bit accuracy.
  14. ;       LOG2(x)= 4.0* (-.3372223 x*x + .9981958 x - .6626105)
  15. ;                         a2             a1            a0
  16. ;       valid for:  .5<= x < 1.0
  17. ;
  18. ;       input value in x0, output in register A.
  19. ;
  20. ;       r1 initially points to the coefficients in y memory in this
  21. ;       order: a1,a2,a0
  22. ;
  23.         mpyr    x0,x0,a  y:(r1)+,y0     ;x**2, get a1
  24.         mpy     x0,y0,a  a,x1 y:(r1)+,y0        ;a1*x, mv x**2, get a2
  25.         mac     x1,y0,a  y:(r1)+,y0     ;a2* x**2, get a0
  26.         add     y0,a                    ;add in a0
  27.         asl     a                       ;mul by 2
  28.         asl     a                       ;mul by 4
  29.         rnd     a                       ;round result
  30.         endm
  31.                
  32.